home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 051-075 / disk_054 / ispell / stat.c < prev    next >
C/C++ Source or Header  |  1992-05-06  |  1KB  |  59 lines
  1. #ifdef AMIGA
  2.  
  3. #include "types.h"
  4. #include "stat.h"
  5.  
  6. #include <libraries/dos.h>    /* For FileInfo struct */
  7. #include <exec/memory.h>    /* For MEMF defines ... */
  8.  
  9. /*
  10.  *  Manx stat() currently isn't very unix compatible, so we roll our
  11.  *  own...
  12.  */
  13.  
  14. stat (path, buf)
  15. char *path;
  16. struct stat *buf;
  17. {
  18.     long lck;
  19.     struct FileInfoBlock *fp;
  20.     register long prot;
  21.     register long ftime;
  22.     extern long Lock ();
  23.     extern void *AllocMem ();
  24.  
  25.     if ((lck = Lock (path, ACCESS_READ)) == 0) {
  26.     return (-1);
  27.     }
  28.     fp = (struct FileInfoBlock *)
  29.     AllocMem ((long) sizeof (struct FileInfoBlock), 
  30.     (long) (MEMF_CLEAR | MEMF_CHIP));
  31.     Examine (lck, fp);
  32.     if (fp -> fib_DirEntryType > 0) {
  33.     buf -> st_mode = S_IFDIR;
  34.     } else {
  35.     buf -> st_mode = S_IFREG;
  36.     }
  37.     prot = ~(fp -> fib_Protection >> 1);
  38.     prot &= 0x7;
  39.     buf -> st_mode |= (prot << 6 | prot << 3 | prot);
  40.     buf -> st_nlink = 1;
  41.     buf -> st_size = fp -> fib_Size;
  42.     ftime = fp -> fib_Date.ds_Days * (60 * 60 * 24);
  43.     ftime += fp -> fib_Date.ds_Minute * 60;
  44.     ftime += fp -> fib_Date.ds_Tick / TICKS_PER_SECOND;
  45.     buf -> st_atime = ftime;
  46.     buf -> st_mtime = ftime;
  47.     buf -> st_ctime = ftime;
  48.     buf -> st_ino = 0;
  49.     buf -> st_dev = 0;
  50.     buf -> st_rdev = 0;
  51.     buf -> st_uid = 0;
  52.     buf -> st_gid = 0;
  53.     FreeMem (fp, (long) sizeof (struct FileInfoBlock));
  54.     UnLock (lck);
  55.     return (0);
  56. }
  57.  
  58. #endif    /* AMIGA */
  59.